SYSTEMS ENGINEERING LABORATORIES PROGRAM LIBRARY 

SOFTWARE DESCRIPTION 

CATALOG NO. 300001F 
DATE 1 April 1971 _ 

PROGRAM TITLE: SYSTEMS 810A/B STANDARD LOAD/DUMP PACKAGE 

PURPOSE: To provide capability for: 

(1) Loading relocatable object program s generated by the 
SYSTEMS 810A/B Macro-Assembler or SYSTEMS 810A/B 
FORTRAN IV Compiler; 

(2) Dumping selected areas of memory in absolute binary format; 

(3) Loading object modules generated by the absolute dump 
function, 

CONFIGURATION: SYSTEMS 81OA/B with ASR-33, High Speed Paper 

Tape Reader/Punch, and 7-track or 9-track 
Magnetic Tape/BTC 1. 

SOFTWARE: Stand-Alone 

PROGRAM LANGUAGE: SYSTEMS 81 OA/B Assembler Language 
SIZE: 2000 o 

O 
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LOADING PROCEDURE: 


Use of this package assumes a memory configuration of greater than 4K; 
otherwise, the SYSTEMS STANDARD BOOTSTRAP PACKAGE (Catalog 
No, 300000F) will provide similar Load/Dump capabilities. 

The procedure required to load this package indues: 

(1) MASTER CLEAR the computer; 

(2) Load the SYSTEMS 810A/B STANDARD BOOTSTRAP PACKAGE 
(Catalog No. 300000) as specified in the program description; 

(3) Position the SYSTEMS 810A/B STANDARD LOAD/DUMP PACKAGE 
(Catalog No. 300001) in the desired input device; 

(4) If the input device is ASR-33 reader control switch 0 (zero) should be 
reset; if the input device is High Speed Paper Tape Reader, control 
switch 0 (zero) should be set; 

(5) Enter 006007 into the P-Counter (006006 / 810B); 

8 8 

(6) Enter the relocation base for the STANDARD LOAD/DUMP PACKAGE 
into the A-Accumulator; this is the load address for the package; 

(7) Depress START twice - the STANDARD LOAD/DUMP PACKAGE will 
be loaded as specified; 

(8) The following will be printed on the ASR-33 teletypewriter: 

LC 

EJ 

XXXXX 00001 

Indicating loading complete, end-of-job code processed, the memory 
high load address, and the next available map zero location. 

USE: 

The SYSTEMS 810A/B STANDARD LOAD/DUMP PACKAGE may be used to 
load object programs in relocatable binary format; to dump selected areas 
of memory in absolute binary format; and to load object modules in abso¬ 
lute binary format. 
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I - RELOCATABLE LOADER 


The procedure required to use the relocatable loader portion of the 
STANDARD LOAD/DUMP PACKAGE includes: 

(1) Position the relocatable binary object program to be loaded in the 
desired input device; 

(2) Make the following manual entries: 


• A-Accumulator = Relocation Base for program 

• B-Accumulator = Map Zero Starting Location 

+ P-Counter = Relocatable Loader Starting Location 

(000007^ + Loader Relocation Base/810A) 

(000006 + Loader Relocation Base/810B) 

8 


(3) Set the appropriate control switches as follows: 


# 






Control Switch 0 Set 

Control Switch 0 Reset 
Control Switch 1 Set 

Control Switch 2 Set 

Control Switch 3 Set 
Control Switch 4 Set 
Control Switch 5 Set 
Control Switch 6 Set 

Control Switch 6 Reset 

Control Switch 7 Set 


Control Switch 10-15 


= Input from High Speed Paper Tape 
Reader 

= Input from ASR-33 Reader 

= List all subroutines referenced by 
program 

= List all unloaded subroutines referenced 
by program 

= Input from magnetic tape 

= List all intermap references 

= Inset map bit on map zero references 

= 9-Track Magnetic Tape Input (If Switch 
3 is set) 

- 7-Track Magnetic Tape Input (If Switch 
3 os set) 

= Binary Magnetic Tape Input (created 
under an 810B RTX System - If Switch 
3 is set) 

= Used to specify which logical unit number 
designates magnetic tape. An entry must 
be made if magnetic tape input is desired. 
Example: Switches 13-15 would be set to 
designate logical Unit 7. 
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NOTE 


For input from 7 or 9 track magnetic tape, the loader assumes BTC1. 
Thus, programs loaded from magnetic tape must not alter the contents 
of locations 10 60 & : 106lg (It is suggested that they be loaded above 1061. ). 
If a different BTC is desired, the FWA BTC memory location may be 
manually loaded into relocation base + 1415 0 in the Load/Dump Program. 

O 


NOTE 

In loading SYSTEMS 810A/B FORTRAN IV Compiler 
generated object programs, the map zero starting 
location (B-Accumulator) must be greater than 10g 
if any library subroutines have been called by the 
source program. 


(4) Depress START twice - the program will be loaded; 

(5) If n EJ n only is printed on the ASR-33 teletypewriter, the relocatable 
loader is awaiting further input to satisfy external subroutines referenced 
by the loaded program. In this instance, position the unloaded external 
program(s) in the proper input device and depress START once; 


NOTE 

Do not MASTER CLEAR the computer prior to loading external 
subroutines. 


(6) When loading is complete, the following will be printed on the ASR-33 
te letype write r: 

LC 

EJ 

XXXXX YYYYY , where 

XXXXX - indicates the highest memory location used by the program; 
YYYYY - indicated the next available map zero location 

(7) To execute the loaded program: 

(a) MASTER CLEAR the computer; 

(b) Enter the starting location of the program into the P-Counter; 

(c) Depress START twice to begin program execution. 
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II - ABSOLUTE DUMP 


The procedure required to use the Absolute Dump portion of the STANDARD 
LOAD/DUMP PACKAGE includes: 


(1) Set the appropriate control switches as follows: 

• Control Switch 0 Set = Dump to High Speed Paper Tape Punch 

• Control Switch 0 Reset = Dump to ASR-33 Paper Tape Punch 

• Control Switch 1 Set = Dump Intermap References after 

1 T dumping program 


(2) Make the following manual entries: 
Location 


' ■; ^ 001776g + Loader Relocation Base 

>y 001777g + Loader Relocation Base 

(22 72L / ""k 


Entry 

End of Dump Address 
Start of Dump Address 


(3) Enter (001561 + Loader Relocation Basd/810A))or (001560 + 


8 




8 


Loader Relocation Base/810B) into the P-Counter. This is 

the start address for the Absolut Dump portion of the STANDARD 

LOAD/DUMP PACKAGE; 


(4) Depress START once - a dump of the specified memory locations 
will be generated in absolute binary format acceptable to the 
Absolute Loader portion of this package (below). 
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Ill - ABSOLUTE LOADER 


The procedure required to use the Absolute Loader portion of the STANDARD 
LOAD/DUMP PACKAGE includes: 

(1) Position the absolute binary object module to be loaded in 
the the desired input device; 

(2) Set the appropriate control switches as follows: 

• Control Switch 0 Set = Input from High Speed Paper 

Tape Reader 

• Control Switch 0 Reset= Input from ASR-33 Reader 

• Control Switch 1 Set = Load intermap references after 

loading program 

(3) Enter (001673 + Loader Relocation Base/810A) or 

8 

(001672 + Loader Relocation Base/810B) into the P-Counter. 

8 

This is the start address for the Absolute Loader portion of 
the STANDARD LOAD/DUMP PACKAGE; 

(4) Depress START twice - the core-image contents of the 
absolute binary input module will be loaded into the same 
portion of memory from which originally dumped. 
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METHOD: 


(1) RELOCATABLE LOADER 

(a) Tape format consists of blocks of 111 frames. Each block con¬ 
tains a start code, thirty-six 24-bit words, and a 16-bit check 
sum. A complete block is read by the loader befor the first 
word in the block is processed; 

(b) If loader input is from magnetic tape, tape is read from Tape 
Transport Number 2/Binary Format (556 BPI, 3 characters/ 
word for 7-track, and 800 BPI, 2 characters/word for 9-track). 

(c) If a parity error occurs during input, five attempts are made to 
read the record before the loader message n R t! is printed on the 
ASR-33 teletypewriter, and the Computer HALTS. Clearing the 
HALT will cause the record to be accepted. 

(d) The following messages are output by the relocatable loader: 

• CK - Check sum Error 

• MO - Memory Overflow into Area of Core Used by Loader 

• CM - Common Request prior to Common Definition 

• LC - Loading Process Complete 

• EJ - End of Job 

(2) ABSOLUTE DUMP 

Tape format consists of a start code, a 16-bit starting address, and 
a 16-bit negative word count followed by blocks of 66 frames each. 

The last block may have less than 66 frames. Each block is ter¬ 
minated with a 16-bit check sum. 

(3) ABSOLUTE LOADER 

(a) Tape format consists of a start code, a 16-bit starting address, 
and a 16-bit negative word count followed by blocks of 66 frames 
each. The last block may have less than 66 frames. Each block 
is terminated with a 16-bit check sum. Words are stored into 
core as they are read. 

(b) If a check sum error is encountered during the loading process, the 
loader message n K ,f will be printed on the ASR-33 teletypewriter, 
and the computer will HALT. Clearing the HALT will cause the 
record to be accepted. 
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01100740 


LAA 

ADDR 

DPC 4/4/69 

159 

016 0 

00155 

11100310 


BRU 

L438 

DPC 4/4/69 

160 

0161 






DPC 

161 

0162 




initialixe base 

HAP DPC 

162 

0163 






DPC 

163 




PAGE 
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016 4 

(J0156 

25400000 

HP 2 R 

D A C 

## 


UPC 

164 

U16 5 

00157 

04100754 


STS 

LZ 


uPC 

1 65 

L 1 6 fc 

00160 

04100755 


STB 

Lib 


Li P C 

166 

016 7 

0 Ql 61 

01100706 


LAA 

K5 


t PC 

167 

016 8 

00162 

00000027 


A 6 A 



DPC 

168 

0169 

00163 

03100667 


STA 

KCML 

L0WER end 3F NEW hap 2ER0 

IRC 

169 

0170 

00164 

05100703 


aha 

K 1 

hap length ='1000 

CPC 

170 

0171 

00165 

03100666 


STA 

K C H H 

UPPER END 0 F NEW HAP i ER 0 

CPC 

171 

0172 

00166 

UH00707 


LAA 

K7 


DPC 

172 

0173 

00167 

0 3 4 0 0 0 0 0 


STA 

U # 1 

ESTABLISH FIRST MAP 2 ER 0 ENTRY 

DpC 

173 

0174 

00170 

14100754 


IMS 

LZ 


DPC 

174 

0175 

00171 

11300156 


3 R U * 

H P £ H 

RETURN 

DPC 

175 

0178 



* 





176 

0177 

00172 

01100737 

L 6 2 

LAA 

0P 



177 

0178 

00173 

00000115 


RSI 

1 



178 

0179 

00174 

0Q000005 


TAB 




179 

0180 

00175 

11500176 


3 R U 

* + l» 1 

BRANCH 0n C0DE BITS IN 0P 


180 

0181 

00176 

11100542 


BRU 

L100 

, , . ,<000 LUAD P0INT 


181 

0182 

00177 

11100614 


SRU 

L11C 

. . , .<010 END JUMP 


182 

0183 

00200 

11100756 


B R U 

L120 

,.,,<020 9-BIT STRING 


163 

0184 

00201 

35401250 

16 

DAC 

TYPD 


DPC 

184 

0185 

00202 

00037774 

S37 4 

DATA 

•37774 


DPC 

18 5 

0186 

00203 

11100235 


B«U 

LI 7 0 

NEW MAP ZwR/ 

DPC 

1 86 

0167 

U 0 2 Q 4 

00170000 

SHI 

DATA 

» • 10 0 0 0 

4K 

DpC 8/69 

187 

0188 

00205 

11100646 


bRu 

L190 

, , , ,<070 SET L0AD FLAG 0N 


188 

0189 

00206 

11300700 


BRU# 

19 

, , . ,<100 ENQ-0F-J0B 


189 

0190 



*#»**#*#ST0RE ABSOLUTE 

DATA <000 


1 90 

0191 

00207 

01100732 

L20 

LAA 

T2 



191 

0192 

00210 

02100744 

L 21 

L0A 

RPL 



192 

0193 

002U 

03400000 


STA 

0,1 

*#######» 


193 

0194 

00212 

12300674 

L 22 

SPB* 

13 

CHECK L0AD FLAG 


1 94 

0195 

00213 

14100744 


IMS 

RPL 

##»#«#«#« 


195 

0196 

00214 

01100744 


LAA 

RPL 

######### 


196 

0197 

00215 

15300702 


GMA# 

IUH 

IS THIS GREATER THAN CURRENT HIGH 

“ 

197 

0198 

00216 

00000033 


N0P 




196 

0199 

00217 

11100221 


BRU 

# + 2 

N0 


199 

0200 

00220 

03300702 


sta» 

ILH 



2 00 

0201 

00221 

15100720 


CMA 

C0M I 

CHECK F0R 0VERFL0W INT0 C0MM0N 


201 

Q 2 Q 2 

00222 

15100717 


cma 

C0MN 



202 

0203 

00223 

11100226 


BRU 

*♦3 

0 K 


203 

ft O n A 

ft no Oil 

4 1 4 ft ft O O A 


DCl i 




ofiA 
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0205 

00225 

11100232 


BRU 

LM0 

ST0RAGE INT0 C0HM0N 


20 5 

0206 

00226 

15100753 


CMA 

IE41 

eac endj 

DPC 3/28/69 

206 

0207 

00227 

15100721 


CHA 

END 

start 0F NAME table 


207 

0208 

0 023q 

11300730 


BRU# 

J 



208 

0209 

00231 

11300730 


BRU# 

J 



?G9 

0210 

00232 

12300675 

LM0 

SPB» 

I 4 

-TYPE- 


210 

0211 

00233 

00146717 


data 

' 'Mw' ' 



2 ll 

0212 

00234 

11300701 


R RiJ * 

11 0 

T0 HALT 


212 

0213 ■ 








213 

0214 




MAP . 

2ER0 PR0CESS0R 


DPC 

214 

0215 



** 




DPC 

215 

02 l 6 

00235 

12300674 

Ll7Q 

SPB« 

13 

CHECK L0AD FLAG 

DP 

216 

0217 

00236 

12300675 


SPB» 

14 



217 

0218 

00237 

00146732 


DATA 

* * M2 1 * 



218 

0219 

0Q240 

01100754 


LAA 

ll 



219 

0220 

00241 

12300201 


SPB» 

16 



220 

0221 

00242 

12300673 


SPB* 

12 

REL0CATEAD FLAG 

DP 

221 

0222 

00243 

00000005 


TAB 


SETUP FUR MP2R 

DPC 

222 

0223 

00244 

12100156 


SP8 

MP2R 



223 

0224 

00245 

11100113 


8 RU 

L10 


OPC 

224 

0225 








225 

0226 



**#*«#**HEM0RY REFERENCE 

PR0CESS0R <010 


226 

0227 

00246 

0U0Q737 

i.40 

LAA 

0 P 

EXTEND sign T0 SIGN bit 


227 

0228 

00247 

06100705 


sha 

K4 

IF DAC <’130 


228 

0229 

00250 

00000022 


S A 2 




229 

0230 

00251 

11300751 


8 RU* 

L40I 



230 

0231 

00252 

01100740 

L402 

LAA 

ADQR 



231 

0232 

00253 

0 0000H6 


lsl 

1 



232 

0233 

00254 

O 0 O 0 Q 1 I 0 


RSA 

1 



233 

0234 

00255 

Q3iQ074Q 

UOB 

sta 

addr 



234 

0235 

00256 

123Q0673 

L40A 

SP8* 

12 

ADD BASE Ti3 ADDR, IF RELATIVE 


235 

0236 

00257 

01100737 

L41 

laa 

0P 



236 

0237 

00260 

15100704 


CHA 

K2 

= * 36 


237 

0238 

00261 

11100263 


BRU 

*+'2 



238 

0239 

00262 

11100417 


BRU 

L50 

BRANCH IF A 15-BIT DAC 


239 

0240 

0 0263 

15100705 


CMA 

K4 

s’26 


240 

0241 

00264 

11100266 


BRU 

**2 


- 

241 

0242 

00265 

11100406 


6 RU 

L48 

BRANCH IF A 14-BIT DAC 


242 

0243 

00266 

0H00740 


LAA 

addr 



243 

0244 

00267 

12100651 


SPB 

M2CH 

TEST T0 SEE 0F IN MAP 2ER0 


244 

0245 

00270 

11100354 


8 RU 

L46 

REFERENCE T0 MAP E6R0 


245 
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U^46 

0 0 2 7 1 

01100740 

L42 

laa 

ADUR 



DPC 

5 4 6 

0 247 

0 0272 

12100342 


S P d 

smmp 

SBe if IN same MAP as RPl DPC 3/14/69 


2 47 

024b 

y 02/3 

01100707 


LAA 

K7 

= 1 



2 48 

Q 2 4 9 

0 0274 

03100735 


ST A 

T5 




249 

0 2 5 o- 
n o k i 

00275 

12300674 

L43 

M, 

SP«» 

13 

CHECK L0AD FLAG 



250 

0252 

00276 

00130404 

V 

SNS 

4 

SENSE SWITCH 4 (LIST INTERRAP REF 

SOURCES ) 

DPC 

251 

252 

0253 

0 0277 

1U00301 


B R U 

*♦2 

LIST 


DPC 

253 

0254 

0030 0 

11100307 


BR u 

*♦7 

BYPASS LIST 

DPC 

8/69 

254 

0255 

00301 

12300675 


spa# 

14 

CARRIAGE RETURN, LINE FEED 


DPC 

255 

0256 

0 0 3 0 2 

00144715 


data 

* * I M * * 




256 

0257 

0 0303 

01100744 


LAA 

RPL 

LIST L0CATI0N REQUIRING INTERMAP 


DPC 

257 

0258 

00304 

12300201 


SPB* 

16 



DPC 

258 

0259 

00305 

01100740 


LAA 

ADDK 


DPC 

8/69 

259 

0260 

Q 0306 

12300201 


5P8* 

16 

LIST L0CATI0N REfERED T0 

DPC 

8/69 

260 

0261 









261 

0262 

00307 

12100410 


SPB 

X 1 DC 

C0NSTRUCT XIAD DPC 3/18/69 



262 

026 3 

00310 

031Q0742 

L43B 

STA 

XI AD 

LITERAL ENTRY INT0 HAP ZER0 

ENTRY 

DpC 4 

263 

0264 

00311 

02100754 

L43A 

LBA 

LZ 

DPC 3/14/69 



264 

0265 

00312 

03400000 


STA 

0,1 

DPC 3/14/69 



265 

0266 

00313 

02100755 


LBA 

L j£ ci 

FIRST ZER0 MAP L0C. 



266 

0267 

00314 

01100742 

144 

LAA 

XIAD 




267 

0268 

00315 

15400000 


CM A 

0,1 

test F 0 R = entry map zer/ 



268 

0269 

00316 

11100320 


6RU 

# + 2 

N0 MATCH 



269 

0270 

00317 

11100322 


BRU 

L45 

MATCH F0UND 



270 

0271 

0 0 3 2 0 

16100707 


AMS 

K7 

= 1 



271 

02?2 

00321 

11100314 


BRij 

L44 

TEST NEXT ENTRY 



272 

0273 

00322 

0 u 0 0 0 0 0 4 

L 45 

TB A 





273 

0274 

00323 

03100733 


sta 

T 3 

T3 s 2ER0 MAP ENTRY 



274 

0275 

00324 

15100754 


CMA 

It 




275 

0276 

00325 

11100327 


B R U 

* + 2 




276 

0277 

00326 

14100754 

L45A 

IMS 

II 

LZ » LZ ♦ 1 



277 

0278 

00327 

031QQ740 


sta 

AD Dr 




2 78 

0279 

0q330 

03100732 


3TA 

T2 




279 

0280 

00331 

0U0Q7U 


lAA 

KlO 




280 

0281 

00332 

02100731 


LBA 

T1 




281 

0282 

00333 

00000030 


0BA 


SET REL0CATABLR 



282 

0283 

00334 

03100731 


STA 

T1 




283 

0284 

00335 

02100735 


LBA 

T5 




284 

0285 

00336 

04100741 


STB 

XI 




285 

0286 

00337 

01100754 


laa 

II 

CHECK F0R LZ 0VERFL0W 



286 
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0287 

0 0340 

12100651 


SPB 

M2CM 

TEST T0 SEE 0F IN MAP 2ES3 

287 

0 28 8 

00341 

11100257 


BRU 

L41 


288 

0289 







289 

0290 



* CHECK 

F0R RPL SAME 

A2 ADDR DPC 3/14/69 

290 

0291 







291 

0292 

00342 

25400000 

SMMP 

DAC 

## 

DPC 

292 

0293 

00343 

02100706 


LB A 

K5 

DPC 

293 

0294 

00344 

00000027 


ABA 


DPC 

294 

0295 

00345 

03100733 


STA 

T3 

DPC 

295 

0295 

00346 

01100744 


laa 

RPL 

########### 

296 

0297 

00347 

00000027 


ABA 



? 97 

0298 

0 035q 

15100733 


CMA 

T3 

DPC 

298 

0299 

00351 

11300342 


BRU# 

SMMP 

DPC 

299 

0300 

00352 

11100424 


BRU 

L52 

DpC 

300 

0301 

00353 

11300342 


BRU# 

smmp 

DPC 

301 

0302 







302 

0303 



••••••••REFERENCE T0 

HAP 2ER0 

303 

0 30 4 



* 




304 

0305 

00354 

02100706 

L46 

lba 

K5 

*’77000 

305 

0308 

00355 

00000027 


aba 


MASK F0R REAL MAP 2ER0 TEST 

306 

O 3 O 7 

0 0356 

OqQoQq22 


SA 2 



307 

03q8 

00357 

1U0Q365 


B RU 

L468 

N0T REAL MAP HER0 

308 

0309 



# 



real Map 2ER0 

309 

0310 

0 0360 

0H0Q7Q7 


laa 

K7 

= 1 

310 

03H 

00361 

15100741 


CHA 

XI 

test F 0 R indexed 

311 

0312 

00362 

11100372 


BRU 

L47a 

INDEXED MAP 2ER0» N0 MAP BIT 

312 

0313 

00363 

00000033 


N0P 



313 

0314 

00364 

00130405 


SNS 

5 

TEST INTER map 2ER0 MAP BIT 0PTI0N 

314 

0315 



# 




315 

03l6 

00365 

12100342 

1468 

SPB 

smmp 

TEST F0R SAME MaP (NEED FfejR MaP BIT) 

316 

0317 

00366 

01100707 


LAA 

K7 

= 1 

317 

0318 

00367 

15100741 


CHA 

XI 

TEST F0R INDEXED 

318 

0319 

QQ370 

lll00274 


BRU 

L42 + 3 


DPC 3l9 

0320 

00371 

00000033 


N0P 



320 

0321 



« 




321 

0322 

00372 

00000003 

L4 7A 

CLA 


RESET MAP BIT D.P.C. 3/6/69 

322 

0323 

0Q373 

02100740 

L47 

L*BA 

addr 

addr 

323 

0324 

00374 

0QQOQ613 


FLL 

6 


324 

0325 

00375 

00000615 


RSL 

6 

MAP 

325 

0326 

00376 

00000U2 


FRA 

1 


326 

0327 

00377 

0H00741 


LAA 

XI 

INDIRECT 

327 
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0920 

00400 

00000212 


F h A 

2 


328 

0329 

u u 4 01 

00000113 


FU 

1 


329 

0 3 3 0 

0 04 02 

011 o u 7 3 7 


laa 

0P 0P-I 

N D E X BITS 

3 3q 

0331 

0 0 4 u 3 

000 0 0115 


RSL 

1 


331 

0332 

0 04 04 

00001413 


FLL 

12 


33? 

l) 333 

0 Q4 05 

11100210 


BRU. 

L 21 


333 

Q334 



& 




334 

U 33i> 




BIT DAC 


3 35 

. 0336 

0 0 406 

12100410 

L48 

S P 8 

XI DC CONSTRUCT XIAO DPC 3/18/69 

336 

033? 

0Q4u7 

11100210 


BRU 

L 2 l 

STARE 1NT0 RPL 

337 

0 336 







338 

0339 




C0D 

-STRUCT XIAD FR0H 

ADDR AND XI 

339 

0340 







340 

0341 

00410 

25400000 

XI DC 

DAC 

»» DPC 

3/18/69 

341 

0342 

00411 

01100740 


LAA 

ADDN DPC 

3/18/69 

34 2 

0343 

00412 

02100741 


L 8 A 

XI DPC 

3/18/69 

343 

0344 

00413 

00000216 


LSL 

2 DPC 

3/18/69 

344 

0345 

00414 

00001614 


FRL 

14 DPC 

3/18/69 

345 

0346 

00415 

00000004 


tba 

DPC 

3/18/69 

346 

0347 

00416 

11300410 


B R U * 

XI DC DPC 

3/18/69 

34 7 

0 34 8 



# 




3 48 

0349 

00417 

02100740 

L5C 

lba 

ADDR 


349 

0350 

00420 

01100731 


lAa 

T 1 


350 

Q351 

00421 

00001716 


LSL 

15 


351 

0352 

00422 

00 J 00030 


Lb A 



352 

0353 

0 0 4 2 3 

1UO021O 


bRU 

L21 

ST 0 RE INT 0 RPL 

353 

0354 



# 




354 

0355 



###* 

• •••REFERENCE T0 CURRENT 

map 

355 

0356 

00424 

01100707 

L52 

LAA 

K7 

«1 <S 6 T HAP BIT a U10 

356 

0357 

00425 

U1QU373 


BRU 

L47 

MERGE WITH XI,0P.ADDR AND ST 0 RE 

357 

0358 







3 58 

0359 



••••••••SU6R0UTINE/C0MH0N REFERENCE 

359 

0360 

00426 

12300672 

L 80 

$P 8 « 

11 

READ 24—8 IT W0RD 

360 

0361 

00427 

03100743 


STA 

CD 

C0HM0N FLAG, DEFINITI 0 N FLAG 

361 

0362 

00430 

0110Q740 


laa 

ADDR 


362 

0363 

00431 

00000002 


neg 



363 

0364 

00432 

00000006 


I AB 

8 I T 

0 0F A a N 

364 

0365 

00433 

00000024 


SAP 



365 

Q366 

00434 

04100740 


STB 

ADDR ADDR 

a- ADDR IF N a 1 

366 

0367 

00435 

12300672 


SPB# 

11 

READ 24-BIT W0RD 

367 

0368 

0 0436 

00001013 


FLL 

8 


368 




AGE 


10 

810A/8 STANDARD 

10 A D/DUMP. PACKAGE 

3Q0Q01F 04/01/71 



0369 

0 0.437 

03100746 


STA 

S1S2 

FIRST 2 CHAR, 0F NAME 


369 

0370 

00440 

04100747 


STB 

S3S4 


370 

0371 

00-441 

12300672 


spe* 

11 

READ 24-BIT W0RD 


371 

0 372 

00442 

05100747 


aha 

S3S4 



372 

0 3>3 

01)4 4 3 

03100747 


STA 

S3S4 

SEC0ND 2 CHAR, 0F NAME 


373 

0 374 

00444 

04100750 


STB 

S5S6 

LAST 2 CHAR, 0F NAME 


374 

0375 

00445 

02100716 


LB A' 

BEGN 

INDEXsSTART 0F SUBR. NAME TAB^E 


375 

0376 

00446 

00000004 

L63 

TBA 




376 

0377 

00447 

15100721 


CHA 

END 

DPC 4/7/69 


377 

0378 

00450 

11100452 


. 8 RU 

# + 2 

DPC 4/7/69 


3 78 

0379 

00451 

11100550 


BRU 

LJ1 



379 

0380 

00452 

01400001 


LAA 

1,1 

FIRST 2 CHAR 0F NAME 


380 

0361 

004&3 

06100746 


SHA 

S1S2 



381 

0382 

00454 

00000022 


SA2 




382 

0383 

00455 

11100546 


B.RU 

L63A 

N0 MATCH 

DPC 

383 

0384 

00456 

01400002 


LAA 

2,1 

SEC0ND 2 CHAR 0F NAME 


384 

0385 

00457 

06100747 


SHA 

S3S4 



385 

0386 

00460 

00000022 


$AZ 




386 

038? 

00461 

11100546 


8RU 

L83A 

N0 MATCH 

DPC 

387 

0388 

00462 

01400003 


LAA 

3,1 

LAST 2 CHAR 0F NAME 


388 

0389 

00463 

06100750 


SHA 

S5S6 



389 

0390 

00464 

00000022 


SAZ 




390 

0391 

0 04&5 

11100546 


BRU 

L83 A 

N0 MATCH 

DpC 

391 

0392 

0 04 66 

01100743 

19 5 

LAA 

CD 

C0MM0N flag, definiti0n flag 


392 

0393 

00467 

00000022 


SA i 




393 

0 39 4 

00470 

11100525 


BRU 

L98 



394 

0395 








395 

0396 



*»»*«**«SuBR0uTINE DEFINITI0N <CD=QQQ 


396 

0397 

00471 

03100727 


STA 

nflg 

SET NAME flag 0N 


397 

0398 

00472 

0310Q722 


STA 

L0DF 



398 

0399 

GQ473 

Q14Q0Q0Q 

L97 

LAA 

0#1 

check DEFINITI0N FLAG 


399 

0400 

00474 

00000023 


SAN 




400 

0401 

00475 

11100522 


BRU 

LL1 

SUBR0UTINE ALREADY L0ADED 


401 

0402 

00476 

03100736 


STA 

TPY 



4 02 

0403 

0Q477 

OliO0740 


LAA 

addr 



403 

0404 

00500 

06100714 


SHA 

K24 

’077777 


404 

0405 

00501 

00000022 


SA2 




405 

0406 

00502 

11100504 


BRU 

*♦2 



406 

0407 

005Q3 

11100517 


8RU 

L97A 



407 

0408 

00504 

01100736 


laa 

TPY 



408 

0409 

0q5q5 

0OOqGo2O 


ASC 




4Q9 
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u a 10 

00506 

0 3 4 0 0 0 0 0 


STa 

0,1 

0411 

0 05 0 7 

00001712 


Fft A 

15 

U 412 

00510 

12300673 


SPfcj* 

12 

0413 

00511 

00000216 


LSL 

2 

0 414 

' 00512 

00000215 


RSL 

2 

0 415 

00P13 

0 J 4 n 0 0 0 0 


STA 

0,1 

0416 

0 0514 

01100723 


LAa 

CALS 

0 417 

00515 

06100707 


SMA 

k7 

0^18 

00516 

0 3 10 u 7 2 3 


ST A 

CALS 

0419 

0 0 5 1 7 

O 0 O 0 O 0 O 3 

L97A 

CLA 


042 0 

00520 

03100722 


STa 

L0UF 

0421 

00521 

1U00113 


d Hu 

Ll u 

0^22 

00522 

01100522 

lli 

laa 

* 

0423 

00523 

03100722 


STA 

L0DF 

Q 424 
0425 

00524 

111Q0U3 

* 

BRU 

Hu 

0426 

00525 

15100710 

L98 

CM A 

K9 

0427 

0Q526 

11100533 


BRU 

L99 

0428 

00527 

11100113 


8 N1j 

HO 

0429 

00530 

01400000 


La A 

0,1 

0430 

00531 

05100740 


A H A 

ADDR 

0431 

00532 

11100534 


BRU 

* + 2 

0432 

00533 

01400000 

L99 

laa 

0,1 

0433 

00534 

OOOQ0116 


LSL 

1 

0434 

00535 

00000115 


RSL 

1 

0435 

00536 

03100740 

L99A 

STA 

ADDR 

0436 

0437 

00537 

00540 

01100737 
00000022 


LAA 

SA2 

0 P 

g438 

0439 

00541 

11100257 

BRu L41 

**##«#»*L0A0 P0INT 

0440 

00542 

12300674 

LlOO 

SPB* 

13 

0441 

00543 

12300673 


SPB* 

12 

0442 

00544 

03100744 


STA 

RPL 

0443 

0444 

00545 

11100113 


BRU 

LlU 

0445 

00546 

16100711 

L83A 

AMB 

K10 

04 46 

0447 

00547 

11100446 


BRU 

L83 

0448 

0449 

00550 

00551 

01100743 

00000022 

LUl 

LAA 

S A2 

CD 

0450 

00552 

11100563 


BRU 

LLF1 


3Q0QQ1F 04/01/71 


410 

INDEXs2ER0 MAP POINTER ADDR. . 411 

ADDRsKELATlVE ENTRY P0I NT 4l2 

413 

DPC 3/20/69 414 

SET RPL iNT0 2ER0 MAP P0INTpR 415 

416 

= 1 417 

cals = cals-i 4ie 

419 

set i0A0 flag 0n 420 

READ next C0DE W0RD 421 

422 

423 

424 

425 

='200 <8RANCH 0N CDO 426 

<010 SUBR, CALL/ EXT, VAR, CALL 427 

<100 C0MM0N OEFINITI0N <IGN0REO 428 

<110 C0MM0N REQUEST 429 

ADD ANY DEFLECT I0N 430 

431 

L0C. 0F zf ER0 MAP P0INTER 432 

Extract 0 ff sign bit 433 

434 

435 

436 

437 

ST0RE INT0 MEM0RY 438 

439 

CHECK L0AD FLAG 440 

add base T 0 addr, if requested 441 

*###*#***#» 442 

D0N'T update RPLK (DUE T0 EQU S> ' 443 


444 

445 

446 

447 

448 

449 

450 
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0451 



ft******* ] 

? R0CfcSS SUBR, 

NAME N0T PREVIOUSLY CALLED 

451 

0 452 

00553 

01100727 


LAA 

NFLG 


452 

0453 

0(j554 

00000022 


5A 2 



453 

(3454 

0 0555 

11100557 


BRU 

* + 2 


454 

0455 

0 0856 

1U0U113 


8RU 

LlO 


4 55 

0456 

00557 

03100722 


ST A 

10 UF 

SET L0A0 FLAG N0N ZER0 

456 

0457 

00560 

00000003 


Cl. A 



457 

0458 

00561 

03100727 


ST A 

NFLG 

SET NAME FLAG 0N 

458 

0459 

00562 

1H00H3 


BRU 

LlO 


459 

0460 

00563. 

12300674 

LL.Fl 

SPB * 

13 

CHECK L0AD FLAG 

460 

0461 

0 0564 

01100743 


LAA 

CD 


461 

0462 

0 0565 

15100710 


CMA 

K9 

s 1 200 

462 

0 463 

0 0566 

IHOO 6 O 2 


BRU. 

L90 

<010 INITIAL SUBR0UTINE CALL 

463 

0464- 

00567 

11100574 


bRu 

L8 6 

<100 initial C0MM0N definite 

464 

0 465 

00570 

12300675 


SPB* 

H 

<110 INITIAL C0MM0N REQUEST 

465 

0466 

00571 

00141715 


DATA 

* * Cm * * 

C0MM0N REQUEST BEF0RE BEING DEFINED 

466 

0467 

0 0572 

11300701 


8RU# 

110 

T 0 HALT 

467 

0 468 







4 68 

0469 

00573 

11300410 


BRU# 

XI DC 

DPC 3/18/69 

469 

0470 



* 




470 

0471 



ftftftft*l 

►***15 BIT DAC 


471 

0472 

00574 

01100717 

L8 6 

LAA 

C0MN 

....INITIAL C0MM0N DEFIN ITI0N 

472 

0473 

00575 

06100740 


sha 

A DOR 


473 

0 47.4 

00576 

03100717 


STA 

C0NN 

INCREMENT ADDR 

474 

0475 

00577 

0310074Q 


STA 

ADDR 


4?5 

0476 

0 0600 

12300676 

188 

SPB* 

15 

ENTER I NT0 NAME TABLE FLNT 

476 

0477 

00601 

11100113 


BRU 

LlO 

C0MM0N D6FINITI0N 

477 

q'478 



* 




478 

0479 

00602 

01100754 

L90 

LAA 

LZ 

, . . .INITIAL subr. call 

479 

0480 

00603 

03100740 


STA 

addr 


480- 

0481 

00604 

14100723 


IMS 

cals 

INCH. N0, 0F CALLS 

481 

0482 

0 06 05 

00000020 


ASC 


SET BIT 1 T0 1 

4 82 

0483 

00606 

12300676 


SPB* 

15. 

ENTER INT0 TABLE 

483 

0484 

0 0607 

01100707 


LAA 

K7 


484 

0485 

00610 

02100754 


LBA 

LZ 

DPC 3/14/69 

485 

0486 

00611 

03400000 


STA 

0,1 

DPC 3/14/69 

486 

0487 

00612 

14100754 


IMS 

LZ 


487 

0488 

00613 

11100257 


BRU 

L41 

enter call int0 mem0Ry 

488 

0489 



* 




489 

0490 



* 




490 

0491 



#**»#»**end jump 


491 



AGE 
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30000XF 04/01/71 


492 

493 

if addr N0T equal T 0 494 

'77000 G0T0 Lll4 DpC 3/20/69 495 

F0R ' 3HQ0i) SUB C0DE 496 

497 
4 98 
499 

SET NAME FLAG 0FF<N0N j?ER0G 500 

50l 

tuhu l 0 ad Flag 0 n 502 

»»*#*#*#***##****» 503 

BASE s RPL 504 

IF CaLS NUT EQUAL T0 0, 505 

G0 T0 L10 506 

507 

<TYPEQ 508 

509 

510 

RELOCATE 511 

512 

513 

SET ENDJ 514 

D0 N0T SET ENDU F0R SU8R0UTINES 5l5 

5 I 6 

ENDJ 5l7 

518 

519 

9-BIT ADD-T0 REM0VED MDL 1/10/69 *C 520 

14- BIT ADD-T0 REH0VED MDL 1/10/69 »C 521 

15- 81T ADD-TU REM0VED MDL 1/10/69 *C 522 


523 

524 

525 

526 

527 

SET L0AD FLAG F0R LEADING <*Q0 528 

529 

530 

TEST ADDRESS IN A ACCUM, F.E.C, 8-30-66 531 

T0 SEE IF IN MAP 2ER0 F.E.C. 8-30-66 532 



PAGE 
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u533 

0 0 6 5 3 

11100662 


8 R U 

ZCHK 

BEL0W VIRTUAL MAP HER0, CHECK REAL MAP ZE«0 D, 

533 

053 4 

0 0654 

11300651 


BRU# 

M2 CM 

F.E.C. 

8 ** 3 Q 6 6 


534 

0535 

00655 

15100666 


C H A 

kcmh 

F.E.C, 

8-30-66 


. 535 

0 536 

00656 

11300651 


BRU* 

MZCM 

F.E.C. 

8-30-66 


536 

0537 

00657 

00000033 


N0P 


F.E.C 

« 8^30^66 


537 

0 538 

0 0660 

14100651 

SKIP 

I MS 

MZ CM 

F.E.C, 

8-30-66 


538 

0539 

0 0661 

11300651 


8 R U # 

MZQH 

F.E.C. 

8-30-66 


539 

0-54 0 

0 0662 

1S1Q0703 

2CHK 

CM A 

K1 

CHECH F0R REAL MAP 2ER0 

DPC 

3/6/6 

540 

054J, 

00663 

11300651 


BRU# 

M2CH 

yes,immediate return 

DPC 

3/6/6 

541 

0542 

00664 

11100660 


BRU 

SKIP 

N0, SKIP IMMEDIATE RETURN 

DPC 

3/6/6 

542 

0543 

0 0665 

11108660 


BRU 

SKIP 

N0, skip immediate return 

DpC 

3/6/6 

543 

0 54 4 

0 0666 

00000000 

KCHH 

HIT 


F.E.C. 

8 3 0 ** 6 6 


544 

0545 

00667 

oouoaooo 

KCML 

H L T 


F.E.C. 

8^30*86 


545 

0546 




address constants 



546 

054? 

00670 

35400113 

A1 0 

DaC 

uo 




547 

0546 

0 06 71 

35401053 

All 

DAC 

L130 




548 

0549 

00672 

35401261 

11 

DAC 

read 




549 

0550 

00673 

35401211 

12 

DAC 

RELF 




550 

0551 

0Q674 

35401171 

13 

DAC 

CHEC 




551 

0552 

00675 

35401224 

14 

DAC 

type 




552 

0553 

0 0676 

35401176 

15 

DAC 

FLNT 




553 

1)554 

00677 

35401013 

17 

DAC 

Ll 23 


12/70 

RLQ *F 

554 

0555 

00700 

35401071 

19 

DAC 

L200 




555 

0 55-6 

00701 

35401073 

110 

DAC 

1300 




556 

0557 

0 0702 

35401776 

IlM 

DAC 

rplh 




557 

0558 









558 

0559 




Data CONSTANTS 




559 

0560 

00703 

QOQOIUQO 

K1 

DATA 

’1000 




560 

0561 

007Q4 

0QQGOU36 

K2 

data 

'36 

DPC 3/29/69 



561 

0562 

00705 

00000026 

K4 

data 

’26 




562 

0563 

00706 

00077000 

K5 

DATA 

*77000 

D.P.C. 3/6/69 



563 

0564 

00707 

OOOOOOQl 

K7 

data 

1 




564 

0565 

00710 

00000200 

K9 

data 

'20 0 




565 

0566 

00711 

00177774 

K10 

DATA 

-4 




566 

0567 

00712 

00177777 

K17 

DATA 

*•1 




567 

0568 

00713 

00001777 

K21 

DATA 

’1777 




568 

0569 

00714 

00077777 

K24 

Data 

•077777 




569 

0570 

00715 

37400003 

K25 

EAC 

U0AD-4 

B 


DPC 

570 

0571 

00716 

37400000 

8EGN 

EAC 

L0AD-7 


DPC 3/28/69 

571 

0572 



<*• 






572 

0573 




VARIABLES 




573 
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0 j 7 4 

0 0717 

2 5 4 0 0 U 0 0 

C C H hi 

D a c 

0 



574 

0 5 7 5 

0 0 72 0 

27400000 

C 0 M I 

t A C 




575 

U 5 7 6 

0 0721 

25400000 

end 

DAO 


L0C * SJF LAST SUBR, NAME ENTRY 


3 76 

C/377 

uQ 722 

2i>40UG00 

l-df 

DAC 


L0AD FLAG <OsL0ADO 


577 

0576 

00723 

25400000 

Cals 

D AQ 


number 0F undefined calls left 


578 

0 57 9 

0 0724 

2 54 oO 0*0 0 

base 

DaC 


PR0GRAM BASE 


379 

0580 

00725 

25400000 

FFSW 

DAC 


UNPACK FLIP FL0P SW 


580 

0561 

0 0^26 

25400000 

WCNT 

DAC 


P0 INTER <INPUT BUFFERO 


581 

0562 

00727 

25400000 

NFLG 

U A C 


name flag 


582 

0583 

00730 

25400000 

J 

DAC 


address switch 


583 

0 564 

00731 

25400000 

Tl 

DAC 


TEMP. CELLS 


584 

0565 

0 0 7 82 

254000-00 

T2 

DAC 

iH* 



585 

1J588 

00733 

254O0OQ0 

T3 

DAC 




586 

0587 

0 0734 

25400000 

T 4 

DAC 




587 

0588 

00735 

25400000 

T 5 

DAC 




588 

0589 

00736 

25400000 

TP Y 

DAC 




589 

0-590 

00737 

254QQ0UQ 

0 P 

DAC 


0PERAT0R <B.I TS 12-150 


590 

0591 

00740 

25400000 

A DDR 

DAC 


ADDRESS <B I TS 2-160 


591 

0592 

00741 

25400000 

XI 

DAC 


INDEX.INDIRECT <8ITS 15,160 


592 

0593 

00742 

254O000Q 

XI AD 

dac 


INDEX,INDIRECT.14 BIT AqQR, 


593 

0594 

00743 

25400000 

CD 

DAC 


C0MM0N/D6FlNED FLAG 


594 

0595 

0 0 744 

27400000 

RPL 

EAC 




595 

0596 

00745 

25400000 

SIZE 

DAC 


C0MM0N BlWCK - S I 2E 


596 

0597 

00746 

254q0q0q 

S1S2 

DAC 

** 

SUBR0UTJNE NAME 


597 

0598 

00747 

25400000 

S3S4 

DAC 


SUBR0 UTInE NAME 


598 

0599 

00750 

25400000 

S5S6 

DAC 


SUBR0UTINE NAME 


599 

0600 

00751 

35401061 

L40I 

DAC 

L40J 



600 

0601 

00752 

35401777 

1141 

DAC 

END J 



601 

0602 

00753 

37401777 

1641 

EAC 

ENUJ 

DPC 

3/28/69 

602 

0603 

00754 

27400000 

12 

EAC 


MAP 2ER0 P0INTER 


603 

0604 

00755 

27400000 

LiB 

EAC 


PERM MAP 2ER0 START 


604 

0605 




9»BIT STRING 



605 

0606 

00756 

12300674 

L120 

SPB* 

13 

CHECK L0AD flag 


606 

0607 

00757 

0Uu067l 


LAA 

All 

SET SWITCH J T0 L130 

“ 

607 

Q6q8 

00760 

03100730 


ST A 

J 



608 

0609 

00761 

01100744 


LAA 

RPL 



609 

0610 

00762 

03100745 


sta 

SI2E 


DPC 

610 

0611 

00763 

12300673 


SP8# 

12 

R6LF 

DPC 

611 

0612 

00764 

03100744 

L132 

STA 

RPL 


DPC 

612 

0613 

00765 

00000005 


TAB 


ft*****###***# 


613 

0614 

00766 

01400000 


LAA 

Oil 

«*#*ft«#******tt 


614 
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b615 

U 0 7 b 7 

02100713 


LB A 

K21 



615 

0 616 

00770 

O0OOQO27 


ABA 




616 

0617 

0 0 7 71 

03100734 


STA 

T 4 


12/70 RLD *E 

617 

0 61 a 

0 07 72 

U2100745 


LEA 

SIZE 


12/70 RL'P *E 

618 

0619 

00773 

04100740 


STB 

ADDR 


12/70 RLD ®E 

619 

0 62 0 

0 07 74 

OU000022 


SAZ 




620 

0621 

0 0 775 

11100777 


B r u 

*♦2 


12/70 RLU *F 

621 

0622 

y 0 7 7 6 

U300677 


efiu* 

17 


12/70 RLD *F 

622 

0623 

00777 

011(30 734 


L A A 

T 4 

IF T 4 ,GT« W1OO0 

12/70 RLD *F 

623 

0 624 

010 00 

7 u 0 0 1 0 0 0 


id N G 

'10 0 0 


12/70 RLD *F 

624 

0625 

01000 

15 3 0 15 3 5 


CM A# 

1115 



625 

0 62 6 

ulooi 

11101034 


BRU 

Ll 26 



626 

06 27 

Q1Q02 

0 g Q 0 0 0 3 3 


N 0 P 




■ 627 

0 628 

010 03 

U1301340 

l-l 24 

L A A # 

1117 

T4 s RPL<3-70, T4<8«160 


628 

0629 

01Q04 

00000716 


LSL 

7 



629 

063 0 

01005 

00000005 


TAB 




630 

0631 

0 10 0 6 

01301551 


LA Att 

1RPL 



631 

0 632 

01007 

00000116 


LSL 

1 


DPC 

632 

0633 

OlOlQ 

00001215 


RSL 

10 


DpC 

633 

0634 

(31011 

00001113 


FLL 

9 



6 34 

0635 

01012 

03301540 


STA# 

I 117 



635 

0 636 

01013 

023O1551 

1123 

L S A * 

IRPL 

# ik 


636 

0637 

01014 

014OO00O 


LAA 

C*1 



637 

0638 

01015 

00000416 


LSL 

4 



638 

0639 

OIO 16 

0UOQ1615 


RSL 

14 



639 

y840 

0 1017 

03301334 


STA* 

I l 14 



640 

0641 

01020 

02301551 

1125 

LB A# 

IRPL 



641 

0 64 2 

01021 

01400OO0 


laa 

0*1 



642 

0643 

01022 

0UOO1415 


RSL 

12 



643 

0644 

01023 

0U0O0H6 


LSL 

1 

* 


644 

0645 

01024 

03301533 


S T A » 

1113 



645 

0646 

01025 

00000022 


SAZ 




646 

0647 

01026 

11101030 


BRU 

* + 2 



647 

0648 

01027 

11301555 


BRU* 

L46A 



648 

0649 

01O3O 

06101616 


SMA 

K4 A 



649 

0650 

01031 

00000022 


SAZ 




650 

0651 

01032 

11301556 


BRU* 

L42B 



651 

0652 

01033 

11301555 


BRU* 

L48A 



652 

0653 

01034 

01301551 

L126 

LAA* 

IRPL 

»*«»******« 


653 

0654 

01035 

06301535 


SMA* 

1115 



654 

0655 

01036 

00000024 


SAP 




655 
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06?* 

uiU^7 

Hi0lUu3 


d R U L1 2 4 




a56 

0 6 i 7 

01Q 4 0 

02-501540 


L b A # I 117 



DpC 

657 

0 fr 5 6 

0 1 0 4 1 

16301554 


AHB* ICML 

K C M L 


L PC 

658 

01> & V 

01042 

0 2 4 0 U U U 0 


LBA 0*1 



DpC 

659 

066 0 

01043 

0 U 0 Q 0 U u 3 


CLA 



DPC 

66 0 

0661 

01044 

OOUOU213 


Fll 2 



DPC 

66l 

u6&2 

0 1045 

03301534 


S T A * 1114 

XI 


DPC 

662 

0 66 3 

01046 

01301551 


L AA* IRpL 



DPC 

663 

0 664 

01047 

UJ0Q1615 


RSL 14 

bank bit 


DPC 

664 

066& 

01050 

0 0 U 0 1 613 


F LL 14 



DpC 

665 

0 666 

01061 

05301540 


STA* 1117 

T 4 


DPC 

666 

0667 

01052 

11101020 


BRU L126 




667 

0666 

01053 

01301540 

L130 

L A A * IU7 




6 68 

0669 

01054 

00000022 


S A £ 




669 

0670 

01055 

11301767 


BRU* 1132 



DPC 

670 

0671 

01056 

01301557 


LAA* SI2F 

SI2E 



671 

0672 

U1057 

03301551 


STA* IRPL 




672 

0673 

01060 

11301531 


BRU* I16 




673 

0674 








674 

06 75 



***** TEST F0R 

EAC 0PERAT0R 



675 

0676 








676 

0677 

01061 

06101426 

L40J 

SMA 0C1O 




677 

0678 

01062 

00000022 


SA2 




678 

06 79 

01063 

11101065 


BRU *+2 




679 

0680 

01064 

11301537 


BRU* L40L 




680 

0681 

01065 

01301532 


LAA# II10 




681 

06 a 2 

01066 

OOOOOlll 


LSA 1 




682 

0683 

01067 

00U00H5 


RSL 1 




683 

0684 

01070 

11301536 


BRU* L40K 




684 

0685 




, 




685 

0686 



#### 

»*«» END IdF 

J0B C0DE 



686 

0687 

01071 

12101224 

L200 

SPB TYPE 



DPC 

687 

0688 

01072 

00142712 


DATA * t EJ *• 




688 

0689 

01073 

01301524 

1300 

UAA* II2 



' 

689 

0690 

01074 

15301527 


C-HA* 1139 




690 

0691 

01075 

11101077 


BRU **2 

PRINT NAP 

IF SENSE SWITCH 1 0N 


691 

0692 

01076 

11101136 


& R'U 0RRR 




692 

0693 

01077 

02301524 


LBA* II2 

SET INDEX 

* 8EGN 


693 

0694 

01100 

04301525 

1310 

STB* I13 

T3 



694 

0695 

01101 

01400000 


LAA 0*1 




695 

0696 

01102 

00000023 


SAN 

SKUP IF N0T L0ADED 


696 
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0697 

01103 

11101106 


BRU 

* + 3 

LEADED ALREADY 



697 

0 696 

0UO4 

00130402 


SNS 

2 

SKIP IF N0T SET 



698 

0699 

U 110 5 

lilOllll 


BRU 

L315-1 

PRINT NAME 0F MISSING SUB 



699 

0700 

01106 

UJl304ul 


SNS 

1 




700 

0701 

01107 

lUollil 


BRU 

*♦2 




701 

0702 

oiliu 

11101131 


bRu 

N0 




702 

0703 

oiUl 

12101224 


SPB 

TYPE 

TYPE-0UT 



703 

0704 

01112 

00040000 

1315 

data 

1 40000 

NULL 



704 

0705 

01U3 

01400Q00 


LAA 

0*1 




705 

0706 

01114 

00000021 


SAS 


mdl 

1/10/69 

*C 

706 

0707 

01115 

00000003 


cla 


MDL 

1/10/69 

*c 

707 

0708 

01116 

11101121 


BRU 

L316 




708 

0709 

01117 

0240OQ00 


LBA 

0*1 




709 

0710 

01120 

01400000 


laa 

0.1 




710 

0711 

U 1121 

12101250 

L316 

SPB 

TYP0 

TYPE IN 2CTAL N0 IN A REG 



711 

0712 

01122 

02301525 


LBA* 

113 

T3 



712 

0713 

01123 

01400001 


LAA 

111 

TYPE NAME 



713 

0714 

01124 

12101156 


SPB 

FIX 




714 

0715 

01125 

014Q0002 


LAA 

2*1 




715 

0716 

01126 

12101156 


SPB 

FIX 




716 

0717 

01127 

01400003 


LAA 

3,1 




717 

0718 

01130 

12101156 


SPB 

FIX 




718 

0719 

01131 

16301526 

N0 

AMB* 

11 5 

55 m ^ 



719 

0720 

01132 

00000004 


T8A 


CHECK F0R END 0F TABLE 



720 

0721 

01133 

06301527 


SHA* 

116 

end 



721 

0722 

01134 

00000022 


SA2 





722 

0723 

01135 

inoiioo 


BRU 

L310 

M0RE NAMES REMAINING 



723 

6724 

01136 

01101424 

0RRR 

LAA 

CRLF 




724 

0725 

01137 

123.01243 


SPB 

TYPA 




725 

0726 

OH4o 

01101776 


laa 

RPLH 

HIGHEST C0RE L0CATI0N USED 



726 

0727 

Qll4l 

I2l0l250 


spa 

TYP0 




727 

0728 

01142 

01301552 


laa* 

ILZ 

highest in map eerj 



728 

0729 

01143 

12101250 


SPB 

TY.PB 




729 

0730 

UU44 

QflOOQOOO 


HLT 





730 

0731 

01145 

01301530 

1320 

LAA* 

117 

CHECK IF SUBR0UTINES REQUIRED 


731 

0732 

01146 

02101777 


LfiA 

ENDU 

SET INDEX Tg START 

DPC 

3/28/69 

732 

0733 

01147 

00000021 


SAS 



DPC 

3/28/69 ' 

733 

0734 

oiiso 

00020000 

IK1 

DATA 

*20000 




734 

0735 

01151 

11400000 


BRU 

0,1 

branch t0 leaded pr0gram 

DPC 

3/28/69 

735 

0736 

01152 

01101772 


LAA 

IKM1 




736 

0737 

01153 

03301547 


STA* 

1129 

•1 T0 WCNT 



737 
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3Q0001F 0A/01/71 


0 7 2 s 

UU64 

Q o j 015 3 0 

STA * II33 





738 

0 1 3v 

01155 

11301531 

8 R U * I I b 





739 

0 7 4 0 

y 1186 

28400000 

FIX DAC 0 


C0NVERT T0 FULL ASCII 

AND 0UTPUT 


740 

0?4i 

01187 

I2l0ll63 

SPB FI XI 


D0 LEFT CHAR 



7 41 

0742 

01160 

00001016 

LSL 8 





742 

0 74 3 

Gllfel 

12101163 

SPfa FI XI 


00 RIGHT CHAR 



743 

0 74 4 

01162 

11301156 

BRU* FIX 





744 

0745 

01163 

25400000 

F I XI DAC 0 





745 

0 7 4 6 

01164 

13101150 

CMA IK1 


«’ 20000 



746 

0747 

ull&8 

0 6101112 

AHA IK 2 


sMQqOQ 



747 

0748 

01166 

00000033 

N 0 P 





748 

0749 

01167 

00170101 

A 0 P 1 , W 





749 

0750 

01170 

11301163 

BRU* FIX! 





750 

0751 

01171 

00001112 

IK2 EQU L315 





751 

0752 



»*#***## CHECK 

L0AD 

FLAG 



752 

0753 

01171 

254O0Q00 

CHEC DAC ** 





753 

0754 

01172 

01301541 

L AA * 1121 


L0AD FLAG 

L0DF 


754 

0755 

01173 

00000022 

SA 2 





755 

0756 

01174 

11301531 

BftU* 1122 


FLAG IS 0FF 

L10 


756 

0757 

01175 

H301171 

8RU* CHEC 


flag is 0n <exitg 



757 

0758 



# 





758 

0759 



•» 





759 

0760 



*<,#*#### SU8R. 

TD MAKE A NAME TABLE ENTRY 



760 

0761 

01176 

23400000 

FLNT DAC ** 





761 

0>62 

01177 

03400000 

STA 0,1 





762 

0763 

01200 

01301542 

LAA» 1123 



S1S2 


763 

0764 

01201 

Q34QQU01 

STA 1,1 





764 

0765 

Q12U2 

01301543 

LAA» 1124 



S3S4 


765 

0766 

01203 

03400002 

STA 2,1 





766 

0767 

01204 

01301544 

IAA* 11^5 



S5S6 


767 

0768 

01205 

0340qoo3 

STA 3,1 





768 

0769 

01206 

16301526 

AH8» 115 


s « 4 



769 

0770 

01207 

04301527 

STB* 116 





770 

077i 

01210 

11301176 

BRU* FLNT 


EXIT 



771 

0772 








772 

0773 



###***## RELATIVISE 

SUBR0UTINE 



773 

0774 

01211 

25400000 

RELF DAC ** 





774 

0775 

01212 

01301545 

LAA* 1126 


check r bit 

T1 


775 

0776 

01213 

00001216 

LSL 10 





776 

0777 

01214 

00000024 

SAP 



MDL 1/10/69 

*C 

777 

0778 

01215 

11101220 

0 R U * ♦ 3 



MDL 1/10/69 

*c 

778 
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0779 

01216 

01301532 

LAA# 11 1 y 



MDL 

1/10/69 *C 

779 

0780 

01217 

11301211 

BRU# RELF 



MDL 

1/10/69 »C 

780 

0781 

01220 

01301532 

LAA* II1U 


add BASE T0 0PERAND 

addr 

. addr 

781 

0 782 

01221 

05301546 

AHA# 1127 



BASE 


782 

0783 

01222 

03301532 

ST A# I110 



ADDR 


783 

0784 

01223 

11301211 

6RU# RELF 


EXIT 



784 

078S 



» 





785 

0786 



*■»###### SUBROUTINE 

T0 

TYPE THE NEXT W0RD 



786 

0787 

01224 

25400000 

TYPE DaC ## 





787 

0788 

01225 

01101424 

laa crip 





788 

0789 

01226 

12101243 

SPB TYPA 





789 

0790 

01227 

01301224 

laa# type 





790 

0791 

01230 

12101243 

SPB TYPA 





791 

0792 

01231 

14101224 

IMS type 


INCREMENT RETURN 



792 

0793 

01232 

11301224 

SRU# TYPE 


EXIT 



793 

0794 



n 





794 

0795 



**##*#*# SUBH0UTINE 

T0 

SHIFT AND TYPE B REGISTER 



795 

0796 

01233 

25400000 

TYPB DAC ## 





796 

0797 

01234 

00000003 

CLA 





797 

0798 

01235 

00000317 

FLA 3 





798 

0799 

01236 

00000516 

LSL 5 





799 

0800 

01237 

00000317 

FLA 3 





800 

0601 

01240 

05101427 

AMA K15 


* * 0 0 * * 



801 

0802 

01241 

12101243 

SPB TYPA 


TYPE ACCUMULAT0R 



802 

0803 

01242 

11301233 

BRU# TYPB 


exit 



803 

0804 



« 





804 

0.805 



•»#*##»## SUBR0UT I N£ 

T 0 

Type C0NTENTS 0F ACC. REGISTER 


805 

0806 

01243 

25400000 

TYPA DAC *# 





806 

0807 

01244 

00170101 

A0P 1»W 




cka 

807 

0808 

01245 

00001016 

LSL 8 




WES 

808 

0809 

01246 

00170101 

A0P 1 »W 




cka 

809 

0810 

01247 

11301243 

BRU* TYPA 


EXIT 



810 

0811 



« 





■811 

0812 



# SUBR0UTINE' TYPES A 

REG IN 0CTAL 



812 

0813 



# 





' 813 

0814 

01250 

00000000 

TYP0 ##* *# 





814 

0815 

01251 

00000116 

LSL 1 




* 

815 

0816 

01252 

QOQQ0H5 

RSL 1 





816 

0817 

01253 

00001412 

FRA 12 





817 

0818 

01254 

05101425 

AHA K12 





818 

0819 

01255 

12101243 

SPB TYPA 





819 
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0«2u 

U 1266 

121012 3 3 


s pb 

Type 





92o 

0b2l 

01257 

12101233 


3 P B 

typc 





821 

0 6 22 

01260 

11301250 


6RU* 

TYP'D 





922 

0623 










823 

U824 



##*#*«*»READ 24 BIT Li 

JADER INPUT WORD 




824 

0 8 2 b 



* 







§25 

0620 

01261 

25400000 

READ 

DAC 

»# 





826 

0827 

01262 

1430154? 


IMS* 

1129 


wCNT 



827 

U 82 8 

01263 

11101321 


BRU 

RD2y 





828 

0q29 

01264 

O 0 I 3 O 4 O 3 


S N S 

3 



FEC 


829 

0830 

01265 

11101341 


BRU 

MAGT 

MAG TAPE INPUT 


FEC 


830 

0831 

012&6 

QUU1771 


LAA 

A I PI 

AlP 1 t W 




831 

0832 

01267 

00130400 


SNS 

0 

TEST F0R H.S, INPUT 




832 

0833 

01270 

11101274 


BRU 

* + 4 





833 

0834 

01271 

00130101 


CEU 

1> w 

SELECT ASR-33 F0R READER 




834 

0835 

01272 

00004Q00 


DATA 

*4000 

M0DE 



_ - 

835 

0836 

01273 

11101277 


BRU 

*+ 4 





836 

0837 

01274 

06101772 


SHA 

IKM1 

increment unit number 




837 

0838 

01275 

00130102 


CEU 

2.W 

SELECT HIGH SPEED READER 




838 

0839 

01276 

00001000 


DATA 

* 1000 





839 

0840 

01277 

03101303 


STA 

A A3 





840 

0841 

01300 

03101763 


STA 

A4 





841 

0842 

01301 

06101677 


AM A 

Dl 

ADD In MERGE BIT 




842 

0843 

Qi3y2 

03101765 


STA 

A5 





843 

0844 

01303 

00000033 

AA3 

m? 


A I P UNIT, W 




844 

0845 

01304 

06101672 


SMA 

0377 

SKIP T0 START 




845 

0846 

01305 

00000022 


SA2 






846 

0847 

013 u 6 

11101303 


BRU 

*-3 

N0T START CWDE 




847 

0848 

01307 

02101430 


LBA 

K16 





848 

0849 

01310 

12101762 

AA4 

SPB 

IHWD 

READ 0nE W0RD FR0M UNIT 




849 

085 0 

01311 

03501524 


STA 

IBUF+55,1 





850 

0851 

01312 

00000026 


IBS 


TEST F0R 1 0L0CK READ 




851 

0852 

01313 

11101310 


BRU 

A A 4 

N0T FINISHED 




852 

0853 

01314 

11101405 


BRU 

MAGI 

G 0 C 0 MPUT 6 checksum 



- 

853 

0854 

01315 

00000022 

TEL Z 

SAH 


CHECKSUM 0K 




854 

0855 

01316 

U101416 


BRU 

TPCK 

CHECKSUM BAD 




855 

0856 

01317 

02101431 


LBA 

K22 

3-54 




856 

0857 

01320 

04301547 


STB* 

1129 


WCNT 



857 

0858 

01321 

02301547 

RD20 

LBA* 

1129 


WCNT 



858 

0859 

01322 

14301550 


IMS* 

1133 

IF FFSW G0ES 2ER0# FETCH 

FFSW 



859 

0860 

01323 

11101332 


BRU 

RD30 

W0RD FR0M LEFT P0SITI0N 



860 




PAGE 
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0861 

01324 

013 Q15 2 4 


LAA 

I ByF + 55 > 1 





861 

0862 

01325 

02501523 


ISA 

IBUF+54,1 





862 

0863 

01326 

0 0 U 01014 


FRL 

8 





863 

0864 

01327 

00001016 

RD25 

LSI 

8 





864 

0865 

01330 

00001015 


RSL 

8 





865 

0866 

U1331 

11301261 


BRU* 

REAU 

RETURN EXIT 




866 

0867 

01332 

01101772 

RD30 

LAA 

IK H1 





867 

0868 

01333 

03301550. 


STA* 

I 183 

RESET FFSW 

FFSW 



868 

0869 

01334 

01501523 


LAA 

I ByF*54 #1 





869 

0870 

01335 

02501524 


lba 

IBUF + 55,1 





870 

0871 

01336 

14301547 


I M S 

1129 


WCNT 



871 

0872 

01337 

00000033 


N0P 






872 

0873 

01340 

1 11 o 13 2 7 


8 RU 

RD25 





873 

0874 

01341 

01101413 

magt 

LAA 

IND1 



fec 


874 

0875 

01342 

00130407 


SnS 

7 

RTx 0 UTPUT? 


12/70 RLD 

*F 

875 

0876 

01343 

05101432 


aha 

K3 

YES, IBUF-2 (57 W0RDS) 

12/70 RLD 

*F 

876 

0877 

01344 

02101415 


LBA 

FWA 

L0AO INDEX T0 

CURRENT ADDRESS 

REGISTER DPC 3/28/ 

877 

0878 

01345 

034Q0000 


STA 

0,1 



DPC 3/28/69 

878 

0879 

01346 

0UQ1414 


LAA 

IND2 



FEC 


879 

0880 

01347 

0U130407 


SNS 

7 

RTX 0UTPUT? 


12/70 RLD 

*F 

880 

0881 

01350 

06101432 


SNA 

K3 

YES, 57 W0RDS 

(ADD TW0) 

12/70 RLD 

# F 

881 

0882 

01351 

03400001 


STA 

1,1 



DPC 3/28/69 

882 

0883 

01352 

00130000 

CEU1 

CEU 

0 



12/70 RLD 

*E 

883 

0884 

01353 

00000000 


DATA 

0 



12/70 RLD 

*e 

884 

0885 

01354 

11101352 


BRU 

♦ -2 



12/70 RLD 

«E 

885 

0886 

01355 

00130200 

TRY3 

TEU 

0 



12/70 RLD 

*E 

886 

0.887 

01356 

ouiooooo 


DATA 

*100000 



12/70 RLD 

*E 

887 

0888 

01357 

11101355 


BRU 

* • 2 



12/70 RLD 

«E 

888 

0889 

01360 

O0130QOQ 

CEU2 

CEU 

0 



12/70 RLD 

*E 

889 

0890 

Ql36l 

OUi044pO 


DATA 

*104400 



12/70 RLD 

*E 

890 

0891 

01362 

11101360 


BRU 

*-2 



12/70 RLD 

*E 

891 

0892 

01363 

00130200 

TEU1 

TEU 

0 



12/70 RLD 

*E 

892 

0893 

01364 

00100000 


DATA 

*100000 



12/70 RLD 

aE 

893 

0894 

01365 

11101363 


BRU 

*-'2 



12/70 RLD 

*E 

894 

0895 

01366 

00130200 

TEU2 

TEU 

0 



12/70 RLD 

«E 

895 

0096 

01367 

00002100 


DATA 

*2100 



12/70 RLD 

*E 

896 

0897 

01370 

11101372 


BRU 

*♦2 




* 

897 

0898 

01371 

11101405 


BRU 

MAGI 





898 

0899 

01372 

02301526 


LBA* 

115 





899 

0900 

01373 

00000026 


IBS 






900 

0901 

01374 

1U01401 


BRU 

BSPC 





901 
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o9q2 

01375 

00170301 


N0P 

1 f w 




902 

0 9 03 

01376 

00151240 


DATA 

* * h m 




903 

U 9 (J 4 

01377 

00000000 


HIT 





904 

0905 

u 14 u u 

111014 0 5 


BRU 

MAGI 




905 

1)906 

01401 

0 013 0 0 0 0 

8 SPC 

ctu 

0 



12/70 RED #E 

906 

0907 

01402 

0 0 0 0 4 u 4 0 


DATA 

•4040 



12/70 RLD «E 

9Q7 

09 0 8 

01403 

1HU14 0 1 


bru 

# ** c 



12/70 RLD *E 

908 

0909 

014Q4 

11101355 


8 R U 

TRY6 




909 

U910 

01405 

02101431 

magi 

lba 

K22 




910 

09H 

0l4y6 

0H01435 


LaA 

ibuf 



FEc 

911 

0912 

01407 

03501524 


AM A 

I BUF + 55,1 



FEC 

912 

0913 

01410 

00000026 


IBS 




FEC 

913 

0914 

01411 

11101407 


BRU 

*-2 



FEC 

914 

0915 

01412 

11101315 


BRU 

TELI 



FEC 

915 

0916 

01413 

37401435 

IND1 

EAC 

IBUF 

INPUT BUFFER P0INTER 


10/70 RLD *E 

916 

0917 

01414 

00100067 

IN D 2 

DATA 

'100067 

55 W0RDS 


10/70 RLD *E 

917 

0916 

01415 

27401060 

FWA 

EAC 

BTC 




918 

0919 



# 






919 

0920 




»»«»type check cckg 

0N BAD CHECK SUM 



920 

0921 

01416 

12101224 

TPCK 

SPB 

TYPE 




921 

0922 

01417 

00141713 


DATA 

"CM' 




922 

0923 

01420 

Q0U00QUQ 


HLT 





923 

0924 

Ul42l 

00130403 


S NS 

3 




924 

0925 

01422 

11101317 


bru 

TEL I + 2 




925 

0926 

1)1423 

11101264 


BRU 

READ+3 

RETRY READ EXCEPT 0N 

MTU 


926 

0927 



a 






927 

0926 

01424 

0 U106612 

CRLF 

DATA 

’106612 




928 

0929 

01425 

00120260 

K12 

data 

'120260 

'* <SPQO' ' 



929 

0930 

01426 

0 0 0 0 0 010 

0ClO 

data 

’10 




930 

0931 

01427 

00130260 

K15 

data 

’130260 




931 

0932 

01430 

00177711 

Kl6 

data 

-55 




932 

0933 

01431 

00177712 

K22 

data 

-54 




933 

0934 

01432 

00177776 

K3 

data 

-2 



12/70 RLD *F 

934 

0935 

01433 

00000002 


BSS 

2 

F0R START C0DE 0N MAG 

TAPE 

~ 

935 

0936 

01435 

00000067 

IBUF 

BSS 

55 

input buffer 



936 

0937 



a 






937 

0938 



**##■ 

»*** , 

ADDRESS CONSTANTS 



938 

0939 

01524 

35400716 

112 

DAC 

BEGN 




939 

0940 

01525 

35400733 

11 3 

DAC 

T3 




940 

0941 

01526 

35400711 

115 

DAC 

K10 




941 

0942 

01527 

35400721 

116 

DAC 

End 




942 



*AGE 


24 
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0943 

01530 

35400723 

117 

JaC 

cals 


943 

0 94 4 

0l53i 

35400113 

116 

DAC 

LIU 


944 

0945 

01532 

354o074q 

I no 

D A C 

ADLh 


945 

0946 

. 01533 

35400737 

1113 

DAC 

0P 


946 

094? 

01534 

35400741 

IH4 

oac 

XI 


947 

0948 

01535 

35400703 

1115 

DAC 

K1 


948 

0949 

01536 

35400255 

L40K 

DAC 

L4QB 


949 

0950 

01537 

33400252 

L40L 

DAC 

L402 


950 

0951 

01540 

354 0 0734 

IU7 

OAC 

T 4 


95l 

0952 

01541 

35400722 

1121 

DAC 

L0DF 


952 

0953 

01542 

000q153i 

1122 

EQU 

116 


953 

0954 

01542 

33400746 

1123 

DAC 

SlS2 


954 

0955 

01543 

35400747 

1124 

DAC 

S3S4 


955 

0956 

. 01544 

33400750 

1125 

DAC 

S5S6 


956 

0957 

01545 

35400731 

1126 

DAC 

T1 


957 

0958 

01546 

35400724 

1127 

DAC 

Base 


958 

0959 

.01547 

35400726 

1129 

DAC 

WCnT 


959 

0960 

0X550 

35400725 

1133 

DAC 

ffsw 


960 

0961 

01551 

35400744 

I RPL 

DAC 

RPL 


961 

0962 

01552 

00001527 

1139 

EQU 

116 


962 

0963 

01552 

354Q0754 

ILZ 

DAC 

L2 


963 

0964 

01553 

35400755 

ilhb 

DAC 

LZB 


964 

0965 

01554 

35400667 

ICML 

DAC 

KCML 

DpC 

965 

0 966 

01555 

354004Q6 

USA 

DAC 

L46 


966 

0967 

01556 

35400271 

L428 

OAC 

L42 


967 

0968 

01557 

33400745 

SI2F 

DAC 

SIZE 


968 

0969 

01561 

70001561 


0RG 

•1561 


969 

0970 

01561 

01101671 

G01 

LAa 

A0P1 

f-f~rP S&f ^ 

970 

0971 

01562 

O0I3O4OO 


sns 

0 


97I 

0972 

01563 

U101565 


b«u 

# + 2 


972 

0973 

01564 

11101570 


8RU 

#♦4 


973 

0974 

01565 

06101772 


$HA 

IKH1 


974 

0975 

01566 

0Q130102 


C£U 

2rW 


975 

0976 

01567 

00004000 


data 

'4000 


976 

0977 

01570 

03101655 


STA 

Al 


9?7 

0978 

01571 

03101657 


STA 

A2 


978 

0979 

01572 

01101772 


LAA 

I KMl 


979 

0980 

01573 

03101770 


STA 

TIME 


980 

0981 

01574 

12101662 


SPB 

ldr 


981 

0982 

01575 

01101672 

UA0 

LAA 

0377 


982 

0983 

01576 

12101653 


SPB 

WD0T 


983 



PAGE 25 

810A/8 STANDARD L0AD/UUMP PACKAGE 

3QQQQ1F 04/01/71 



0 98 4 

01577 

011 u 17 7 7 


laa 

b!\u j 

BASE ADDRESS 


984 

0985 

0 16 0 U 

12101633 


3PB 

W D U T 



965 

0 9 is 6 

01601 

ttOOUOUOS 


TAB 




986 

0987 

U16 o 2 

0 o 1 ;j 1 7 7 6 


3 H A 

RPlm 



98 7 

0988 

016 03 

05101772 


AHA 

I-K'f'U 



988 

0989 

01604 

03101773 


STA 

NWCT 



989 

0990 

U1605 

12101553 


SPB 

W0DT 

0UTPUT NEC W0RD C0UNT 


990 

0992. 

0 16 0 6 

0H01732 

0N IT 

LAA 

Ml OO 



991 

0992 

yl607 

08101774 


sta 

RDCT 



9 92 

0993 

0161U 

O 0 O 0 O 0 O 3 


CLA 


initialize check sum 


993 

0994 

01611 

08101775 


STa 

hycs 



994 

0995 

01612 

01400000 

0PUT 

LAA 

Oil 



995 

0996 

01613 

12101653 


SPB 

WD0T 



996 

0997 

01614 

05101775 


AHA 

HYCS 



997 

0998 

01615 

08101775 


STA 

HYCS 



998 

0999 

01616 

00000026 

K4 A 

IBS 




999 

1000 

01617 

OUOOOOOO 

7/21 

hlt 




1000 

1001 

01620 

14101773 


IHS 

NWCT 



1001 

1002 

01621 

11101623 


BNU 

*♦2 



1002 

1003 

01622 

11101625 


3RU 

CSUM 



1003 

1004 

U1623 

14101774 


IMS 

WDCT 



1004 

1005 

01624 

11101612 


BRU 

0PUT 



1005 

1QQ6 

01625 

01101775 

CSUM 

laa 

HYCS 



1006 

1007 

01626 

12101653 


SPB 

HD0T 

0UTPUT CHECK SUM 


1007 

1‘008 

01627 

01101773 


LAA 

NWCT 



1008 

l0 09 

01630 

00000024 


SAP 




1009 

1010 

01631 

HIUI 606 


BRU 

0NIT 



loio 

loll 

01632 

12101662 

ENDD 

SPB 

LDR 



1011 

I0l2 

01633 

14101770 


IMS 

Tint 



1012 

1013 

01634 

11101637 


BRU 

«+3 



1013 

1014 

01635 

00130401 


SNS 

1 



1014 

1015 

01636 

11101646 


BRU 

DMP0 



1015 

1016 

01637 

00130400 


SNS 

0 



1016 

1017 

01640 

11101642 


BRU 

* + 2 



1017 

1018 

01641 

11101644 


8«U 

* + 3 



1018 

1019 

01642 

00130102 


CEU 

2 1 W 



1019 

1020 

01643 

00002000 


DATA 

*2000 



1020 

1021 

01644 

qquqqooo 


HLT 




1021 

1022 

01645 

11101561 


BRU 

G01 


MDL 1/10/69 #C 

1022 

1023 

01646 

01301553 

DHP0 

LAA* 

ILZB 



1023 

1024 

01647 

03101777 


STA 

end u 



1024 





PAGE 26 810A/B STANDARD L0AD/DUMP PACKAGE 


1025 

01650 

01301552 


LAA* 

IL2 

1026 

01651 

03101776 


sta 

RPLH 

l(j27 

01652 

11101575 


BRIO 

LAaU 

1028 

01653 

OOOOQOQO 

WD0T 

iii 

** 

1029 

01654 

03101617 


STA 

Hit 

1030 

U1655 

00000033 

A1 

!M 0 P 


1031 

01656 

0a00l0l6 


LSI 

8 

1032 

01657 

00000033 

A2 

N 0 P 


1033 

0166 G 

OHol6l7 


LAA 

an 

1034 

0 1661 

11301653 


BRU* 

W D B 7 

1035 

01662 

00000000 

ldr 

ZZ2 

» » 

1036 

01663 

02101732 


lba 

MlOu 

1037 

01664 

0 0 0 0 0 0 0 3 


CLA 


1038 

01665 

12101653 


SPB 

WDBT 

1039 

01666 

0 0 0 0 0 0 2 6 


I BS 


1040 

01667 

11101665 


8 HU 

#**2 

1041 

01670 

H3o1662 


BRU* 

LPR 

1042 

01671 

00170101 

A0P1 

A0P 

1# w 

1043 

01672 

QU00037? 

-£322. 

-HATA 

’37 7 

' '1044 

01673 

01101771 

chan 

LAA 

A 1 Pi 

1045 

01674 

00l30400 


sns 

0 

1046 

01675 

11101701 


BRU 

* + 4 

1047 

01676 

00130101 


CEU 

1 * W 

1048 

01677 

00004000 

PI 

DATA 

MOOO 

1049 

01700 

11101704 


8 RU 

ft + 4 

1050 

0 17 01 

06101772 


sha 

IKMl 

1051 

017 0 2 

00130102 


CEU 

2 * N 

i 052 

01703 

QUGOIOQO 

I K 6 

DATA 

’1000 

1053 

01704 

03101712 


STA 

A3 

1054 

01705 

03101763 


sta 

A4 

1055 

0 17 06 

05101677 


aha 

Dl 

1056 

01707 

03101765 


STA 

A5 

1057 

0l7lQ 

01101772 


LAA 

IK.H1 

1058 

01711 

03101770 


sta 

TIME 

1059 

01712 

00000033 

A3 

N0P 


1060 

01713 

00000022 


SAZ 


1061 

01714 

11101716 


8RU 

*♦2 

1062 

01715 

11101712 


BRU 

#•3 

1063 

01716 

12101762 


SPB 

INWD 

1064 

01717 

03101777 


STA 

ENDS 

1065 

01720 

O 0 O 0 O 0 O 5 


TAB 



3Q00Q1F 04/01/71 


1025 
10 26 

1027 

1028 

1029 

1030 
1*331 
10 32 
10 33 
10 34 
1035 
10 36 
1037 
10 3 8 




1039 

1040 

1041 
10 42 

1043 

1044 
10 45 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 
10 56 

1057 

1058 

1059 


1060 

1061 

1062 

1063 

1064 

1065 



'AGE 27 610A/B STANDARD L.0AD/DUMP PACKAGE 300Q01P 04/01/71 


1U66 

ill 7 21 

12101762 


SPd 

I NWD 



in 66 

1067 

01722 

03101773 


STA 

NWCT 



1067 

10 66 

01723 

01101732 

INI T 

laa 

Ml 0 U 



1q68 

10 69 

U 1 724 

03101774 


STA 

WDCT 



1069 

1070 

01725 

000UUUQ3 


CLA 




1070 

1071 

01726 

03101775 


STA 

MYCS 



1071 

1072 

01727 

12181762 

I NPT 

SPB 

I NWD 



1072 

1073 

U 1730 

G34QOOU0 


STA 

0#1 



1073 

1074 

01731 

00000026 


IBS 




1074 

107b 

01732 

00177700 

Ml 0 0 

DATA 

-64 



1075 

1076 

01733 

05181775 


AHA 

MYCS 



1076 

1077 

01734 

03101775 


STA 

MYCS 



1077 

1078 

01735 

14101773 


IMS 

NWCT 



1078 

1079 

01736 

11101740 


BRU 

* + 2 



1079 

1080 

01737 

11101742 


8 RU 

CSML 



1080 

1081 

01740 

14101774 


IMS 

WDCT 



1081 

1082 

01741 

11101727 


BRU 

I NPT 



1082 

10 83 

01742 

12101762 

CSML 

SPB 

I NwD 



1083 

1084 

01743 

15101775 


cma 

MYCS 



1084 

1085 

01744 

11101746 


BRU 

CK 



1085 

1086 

01745 

11101751 


8 RU 

0 K 



1086 

1087 

01746 

00170501 

CK 

M0P 

1 # w 



1087 

1088 

01747 

00145640 


DATA 

' » K * ' 



1088 

1,0 89 

01750 

QQ0Q4Q00 


data 

* 00400Q 

HIT INDEX F0R DUMP 


1089 

109 0 

oi?n 

QU01773 

0 K 

laa 

NwCT 



1090 

1091 

01752 

0OQqQq24 


sap 




1091 

1092 

01753 

11101723 


8«U 

In I t 



1092 

1093 

01754 

141Q177Q 


IMS 

TIME 



1093 

1094 

01755 

1U01760 


BRU 

* + 3 



1094 

1095 

01756 

00130401 


SNS 

1 . 



1095 

1096 

01757 

Hl0l7i2 


BRU 

A3 



1096 

1097 

01760 

000040GQ 


DATA 

*4000 

HLT 


1097 

1098 

01761 

11101673 


8RU 

CHAN 



1098 

1099 

01762 

00004000 

I NWD 

BATA 

’004000 


' 

1099 

1100 

01763 

00000033 

A 4 

N0P 




1100 

1101 

01764 

00001016 


LSI 

8 



1101 

1102 

01765 

00000033 

A5 

N0P 




1102 

1103 

01766 

11301762 


BRU* 

innd 



1103 

1104 

01767 

35400764 

1132 

DAC 

1132 


DPC 

1104 

1105 

01770 

OU004QOQ 

TIME 

DATA 

*004000 

- 


1105 

1106 

01771 

00170301 

A I Pi 

A IP 

i»w 



1106 




*AGE 28 


810 A/B STANDARD L0AD/DUMP PACKAGE 


1107 01772 Ou 177777 IKH1 DATA -1 

1108 01773 254QO0Q0 NWCT DAC 0 

1109 01774 2S400000 NDCT DAC 0 

1110 01775 25400000 HYCS UAC 0 

111! 01776 25400000 RPLH DaC 0 

1112 01777 25400000 EnDJ DAC 0 

1113 02000 70400007 END LBaD 

ERR0RS 0000 00000 


300001E 04/01/71 


1107 

H08 

1109 

1110 
nil 
1112 
1113 



AGE 29 810 A/8 STANDARD 10AD/DUMP PACKAGE 300001F 


04/01/71 


f $ f £ X T tz k A L • * • 




PAGE 30 810A/B STANDARD L0AD/DUMP PACKAGE 


» » * S Y s'l B tfi L I U b • i > 


A1 

977 


10 30 



AlO 

126 

«■ 

547 



All 

* 348 


607 



A2 

9 78 


1032 



A3 

1053 


1059 


1096 

A4 

841 


1054 


1100 

A5 

343 


1056 


1102 

AA3 

840 


844 



AA4 

# d 4 9 


852 



ADDR 

136 


156 


159 


3 23 


342 


849 


475 


4 8|j 


494 

A I PI 

831 


1044 


1106 

A0P1 

970 

* 

1042 



BASE 

47 


504 


579 

BE GN 

117 


375 

* 

571 

BSPC 

68 


901 


906 

BTC 

* 43 


918 



CAUS 

121 


416 


418 

CD 

361 


3 92 


448 

CEU1 

65 


66 


683 

CEU2 

67 


8 89 



chan 

# 1044 


IQ 98 



CHEC 

551 


753 


757 

CK 

1085 


1087 



C0H I 

115 


201 


575 

C0MN 

1q5 


111 


H2 

CRLF 

7 24 


768 


928 

CSmL 

1080 


1083 



CSUM 

10 03 

* 

IQ 06 



D1 

842 


1048 


■1055 

ONP0 

1015 

* 

1023 



END 

118 


207 


377 

endd 

* 1011 





ENDJ 

601 


602 


732 

ffsw 

125 


580 


960 

FIX 

714 


716 


718 

FI XI 

741 


7 43 

ft 

745 

FINT 

553 

* 

761 


771 


3QQQ01F 04/01/71 


231 

234 

243 

362 

366 

4 q3 

516 

» 591 

619 

958 



93y 




481 

505 

* 578 

461 

» 594 



114 

202 

472 

576 

942 


984 

1024 

1064 

740 

744 


750 




246 259 27ft 
430 435 473 
945 


943 


474 * 574 


* 1112 





04/01/71 


549 





441 

440 

508 

511 
460 
* 552 

«■ 550 

493 

611 
» 551 

606 

870 

9ll 

912 

916 

* 936 


945 


668 * 951 


871 


* 959 



3 AGE 32 81ft A/8 STANDARD 10AD/DUMP PACKAGE 3Q00Q1F 04/01/71 


IKM1 


736 


837 


667 

974 

979 

988 

1050 

ILH 


4 8 


197 


200 

* 557 




Hi 


726 

& 

963 


1025 





IL 28 


964 


1023 







IND1 


874 


916 







1ND2 


879 


917 







INI T 


1068 


1092 







INPT 


1072 


1082 







INWD 


849 


1063 


1U66 

1072 

1083 

* 1099 

1103 

IRPL 


63i 


636 


641 

653 

663 

672 

» 961 

8 


127 


208 


209 

•» 583 

608 



K1 


170 


54 0 


560 

948 




K10 


280 


445 


566 

941 




Kl2 


818 


929 







K15 


801 


931 







K16 


848 

£ 

932 







K17 


123 

* 

567 







K2 


131 


237 

* 

561 





K2l 

# 

568 


615 







K22 


856 


910 

■fr 

933 





K24 


4p4 


569 







K25 


106 

# 

570 







K3 


876 


881 

■a 

934 





K4 


228 


240 

* 

562 





K4A 


649 


999 







K5 


167 


293 


305 

495 

* 563 



K7 


172 


248 


271 

310 

317 

356 

417 

K9 


87 


426 


462 

* 565 




kcmh 


171 


535 

a 

544 





KCMl 


169 


532 


545 

965 




UO 


126 


224 


421 

424 

426 

443 

455 



529 


54? 


944 





UOO 


181 

** 

440 







U10 


182 


493 







U12 

# 

499 


5l5 


518 





L114 


498 

« 

511 







1120 


183 


606 







L123 


554 


636 







U24 

« 

628 


656 







L125 

# 

641 


667 







U26 


626 

# 

653 








1057 


484 


459 


* 1107 


* 564 

477 



AGE *53 

810A/B STANDARD 

L0AD/DUMP PACKAGE 

300001F 

04/01/71 

L130 


34$ 


66 8 




1132 


612 

1104 




L- 10 


106 


216 




L 1 V 0 


188 


527 




1.20 


147 


191 




U20U 


555 

ft 

687 




L21 


192 


333 

337 

353 


122 

# 

194 






L3&0 


556 


689 




13X0 

* 

694 


72 3 




L3XS 


699 

# 

704 

751 



L319 


708 


711 




i.320 

# 

731 






L4G 


140 


227 




' 140 A 


235 






L40B 

» 

234 


949 




1401 


230 


600 




1403 


600 

* 

677 




UOK 


684 


949 




1401 


680 


950 




14 02 


231 


950 




141 

# 

236 


288 

438 

488 


142 


246 


319 

967 



L42B 


651 


967 




143 

* 

250 






L43A 

# 

264 






L43B 


160 

41 

263 




1,44 


267 


272 




U5 


270 


273 




L45A 

# 

277 






146 


245 


305 




L46B 


308 


316 




L47 


323 


357 




147A 


312 


322 




L48 


242 


336 

966 



L48A 


648 


652 

* 966 



L50 


239 

* 

349 




L52 


300 

# 

356 




L60 


150 






L62 


152 


177 




L0O 


149 


360 






PAGE 34 


810A/B STANDARD 10AD/DUMP PACKAGE 


300001F 04/01/71 


183 

L83A 


376 

383 


446 

387 

391 

* 445 

L.86 


464 


472 



188 


476 





L90 


4fe3 


479 



L95 


392 





197 


399 





1.97 A 


407 


419 



1.98 


394 

ft 

426 



199 


427 


432 



L99A 


435 





LAA0 


982 


1027 



LDR 


981 


1011 

* 1035 

1041 

IJ1 


379 

* 

448 



LU 


401 


422 



UFl 


450 


460 



LH0 


205 

* 

210 



L0AD 


47 


5 70 

571 

1113 

10C1 


65 


75 



L0C2 


66 


76 

84 


L0C3 

# 

67 


85 



L0C4 

# 

68 


86 



L0C5 


69 


88 



L0C6 

* 

70 


69 



L0C7 


71 


90 



L0DF 


120 


398 

420 

423 

LX10 


123 


507 

510 


Li 


165 


174 

219 

264 



487 


603 

963 


Li B 


166 


266 

* 604 

964 

H100 


991 


1036 

1068 

# 1075 

MAGI 


853 


898 

905 

* 910 

MAGT 


830 


874 

r 


MASK 


72 


77 



mpzr 


50 


164 

175 

223 

MYCS 


994 


997 

996 

1006 

MZCM 


244 


287 

# 531 

534 

NFLG 


51 


397 

452 

458 

N0 


702 

* 

719 



NTT 

* 

63 


73 



NHCT 


909 


1001 

1GQS 

1067 


456 

502 

528 

# 577 

952 

275 

277 

286 

479 

485 


1071 

1076 

1077 

1084 

*1110 

536 

538 

539 

541 


500 

512 

* 582 



1078 

1090 

» 110® 





‘AGE 35 610A/B STANDARD 10AD/DUMP PACKAGE 


B3/7 


645 

0 C 1 O 

iV i yt 


677 

to NI T 

«* 

-4 U o o 

991 

0P 


133 

0 P U T 


995 

0RRR 


692 

RD20 


828 

RD25 


364 

RD30 


86 0 

READ 


549 

REIF 


550 

RPL 


49 



503 

RPLH 


557 

S1S2 


369 

$374 


97 

S3S4 


370 

S5S6 


374 

SIZE 


596 

SIZE 


671 

SKIP 


538 

SMI 


102 

shnp 


247 

sf t 


60 

T1 


129 

T2 


130 

T3 


274 

T 4 

# 

587 

T5 


154 

teu 


854 

TEUi 


69 

TEU2 


70 

TIME 


980 

TPCK 


855 

TPY 


402 

TRY3 


71 

TYPA 


725 

TyPB 


796 

TYPE 


552 

TYP0 


184 


962 * lU43 

* 930 



10 90 



1010 



177 

227 


10 05 



724 



858 



873 


«■ 

867 



826 

866 

# 

774 

780 


94 

107 


595 

609 


726 

987 


381 

* 597 


185 



3/2 

373 


389 

» 599 


610 

618 


968 



542 

543 

# 

187 



292 

299 

it 

64 



137 

143 


134 

155 


295 

298 


617 

623 


249 

. 284 


915 

925 


892 


«■ 

895 



1012 

1058 

** 

921 



408 

* 589 


886 

909 


789 

791 


803 

820 


687 

703 


711 

727 


300QQ1F 04/01/71 


236 330 436 » 590 946 



802 

* 806 

810 

819 


821 





787 

790 

792 

793 

921 

729 

* 814 

822 





PAGE 36 

810A/B STANDARD 10AD/DUMP PACKAGE 

3Q0QO1F 04/01/71 




N 

749 

807 

809 

834 

838 

902 

975 

1019 

1042 


1047 

1051 

1 U 87 

1106 






WCNT 

124 

« 581 

959 







WDCT 

992 

1004 

1069 

1081 

« 1109 





WD0T 

983 

985 

990 

996 

1007 

* 1028 

1034 

1038 


XI 

140 

285 

311 

318 

327 

343 

* 592 

947 


XI AD 

142 

150 

263 

267 

# 593 





XI DC 

141 

262 

336 * 

• 341 

347 

469 




HCHK 

533 

* 540 








2221 

» 1000 

1029 

1033 









